home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-04 / dflt14.zip / PICTBOX.C < prev    next >
Text File  |  1992-06-16  |  8KB  |  283 lines
  1. /* -------------- pictbox.c -------------- */
  2.  
  3. #include "dflat.h"
  4.  
  5. typedef struct    {
  6.     enum VectTypes vt;
  7.     RECT rc;
  8. } VECT;
  9.  
  10. unsigned char CharInWnd[] = "─│┌┐┘└┼├┤┴┬";
  11.  
  12. unsigned char VectCvt[3][11][2][4] = {
  13.     {   /* --- first character in collision vector --- */
  14.         /* ( drawing ─ ) ( drawing │ ) */
  15.              {{"───"},     {"┌├└"}},
  16.              {{"┌┬┐"},     {"│││"}},
  17.              {{"┌┬┬"},     {"┌├├"}},
  18.              {{"┐┐┐"},     {"┐┐┐"}},
  19.              {{"┘┘┘"},     {"┘┘┘"}},
  20.              {{"└┴┴"},     {"├├└"}},
  21.              {{"┼┼┼"},     {"┼┼┼"}},
  22.              {{"├┼┼"},     {"├├├"}},
  23.              {{"┤┤┤"},     {"┤┤┤"}},
  24.              {{"┴┴┴"},     {"┴┴┴"}},
  25.              {{"┬┬┬"},     {"┬┼┼"}}    },
  26.     {   /* --- middle character in collision vector --- */
  27.         /* ( drawing ─ ) ( drawing │ ) */
  28.              {{"───"},     {"┬┼┴"}},
  29.              {{"├┼┤"},     {"│││"}},
  30.              {{"┌┌┌"},     {"┌┌┌"}},
  31.              {{"┐┐┐"},     {"┐┐┐"}},
  32.              {{"┘┘┘"},     {"┘┘┘"}},
  33.              {{"└└└"},     {"└└└"}},
  34.              {{"┼┼┼"},     {"┼┼┼"}},
  35.              {{"├├├"},     {"├├├"}},
  36.              {{"┼┼┤"},     {"┤┤┤"}},
  37.              {{"┴┴┴"},     {"┼┼┴"}},
  38.              {{"┬┬┬"},     {"┬┬┬"}}    },
  39.     {   /* --- last character in collision vector --- */
  40.         /* ( drawing ─ ) ( drawing │ ) */
  41.              {{"───"},     {"┐┤┘"}},
  42.              {{"└┴┘"},     {"│││"}},
  43.              {{"┌┌┌"},     {"┌┌┌"}},
  44.              {{"┬┬┐"},     {"┐┤┤"}},
  45.              {{"┴┴┘"},     {"┤┤┘"}},
  46.              {{"└└└"},     {"└└└"}},
  47.              {{"┼┼┼"},     {"┼┼┼"}},
  48.              {{"├├├"},     {"├├├"}},
  49.              {{"┼┼┤"},     {"┤┤┤"}},
  50.              {{"┴┴┴"},     {"┼┼┴"}},
  51.              {{"┬┬┬"},     {"┬┬┬"}}    }
  52. };
  53.  
  54. /* -- compute whether character is first, middle, or last -- */
  55. static int FindVector(WINDOW wnd, RECT rc, int x, int y)
  56. {
  57.     RECT rcc;
  58.     VECT *vc = wnd->VectorList;
  59.     int i, coll = -1;
  60.     for (i = 0; i < wnd->VectorCount; i++)    {
  61.         if ((vc+i)->vt == VECTOR)    {
  62.             rcc = (vc+i)->rc;
  63.             /* --- skip the colliding vector --- */
  64.             if (rcc.lf == rc.lf && rcc.rt == rc.rt &&
  65.                     rcc.tp == rc.tp && rc.bt == rcc.bt)
  66.                 continue;
  67.             if (rcc.tp == rcc.bt)    {
  68.                 /* ---- horizontal vector,
  69.                     see if character is in it --- */
  70.                 if (rc.lf+x >= rcc.lf && rc.lf+x <= rcc.rt &&
  71.                         rc.tp+y == rcc.tp)    {
  72.                     /* --- it is --- */
  73.                     if (rc.lf+x == rcc.lf)
  74.                         coll = 0;
  75.                     else if (rc.lf+x == rcc.rt)
  76.                         coll = 2;
  77.                     else 
  78.                         coll = 1;
  79.                 }
  80.             }
  81.             else     {
  82.                 /* ---- vertical vector,
  83.                     see if character is in it --- */
  84.                 if (rc.tp+y >= rcc.tp && rc.tp+y <= rcc.bt &&
  85.                         rc.lf+x == rcc.lf)    {
  86.                     /* --- it is --- */
  87.                     if (rc.tp+y == rcc.tp)
  88.                         coll = 0;
  89.                     else if (rc.tp+y == rcc.bt)
  90.                         coll = 2;
  91.                     else 
  92.                         coll = 1;
  93.                 }
  94.             }
  95.         }
  96.     }
  97.     return coll;
  98. }
  99.  
  100. static void PaintVector(WINDOW wnd, RECT rc)
  101. {
  102.     int i, xi, yi, len;
  103.     unsigned int ch, nc;
  104.     unsigned int newch;
  105.     static int cw, fml, vertvect, coll;
  106.  
  107.     if (rc.rt == rc.lf)    {
  108.         /* ------ vertical vector ------- */
  109.         nc = '│';
  110.         vertvect = 1;
  111.         len = rc.bt-rc.tp+1;
  112.     }
  113.     else     {
  114.         /* ------ horizontal vector ------- */
  115.         nc = '─';
  116.         vertvect = 0;
  117.         len = rc.rt-rc.lf+1;
  118.     }
  119.  
  120.     for (i = 0; i < len; i++)    {
  121.         newch = nc;
  122.         xi = yi = 0;
  123.         if (vertvect)
  124.             yi = i;
  125.         else
  126.             xi = i;
  127.         ch = videochar(GetClientLeft(wnd)+rc.lf+xi,
  128.                     GetClientTop(wnd)+rc.tp+yi);
  129.         for (cw = 0; cw < sizeof(CharInWnd); cw++)    {
  130.             if (ch == CharInWnd[cw])    {
  131.                 /* ---- hit another vector character ---- */
  132.                 if ((coll=FindVector(wnd, rc, xi, yi)) != -1) {
  133.                     /* compute first/middle/last subscript */
  134.                     if (i == len-1)
  135.                         fml = 2;
  136.                     else if (i == 0)
  137.                         fml = 0;
  138.                     else
  139.                         fml = 1;
  140.                     newch = VectCvt[coll][cw][vertvect][fml];
  141.                 }
  142.             }
  143.         }
  144.         PutWindowChar(wnd, newch, rc.lf+xi, rc.tp+yi);
  145.     }
  146. }
  147.  
  148. static void PaintBar(WINDOW wnd, RECT rc, enum VectTypes vt)
  149. {
  150.     int i, vertbar, len;
  151.     unsigned int tys[] = {219, 178, 177, 176};
  152. /*    unsigned int tys[] = {'█', '▓', '▒', '░'};
  153. */
  154.     unsigned int nc = tys[vt-1];
  155.  
  156.     if (rc.rt == rc.lf)    {
  157.         /* ------ vertical bar ------- */
  158.         vertbar = 1;
  159.         len = rc.bt-rc.tp+1;
  160.     }
  161.     else     {
  162.         /* ------ horizontal bar ------- */
  163.         vertbar = 0;
  164.         len = rc.rt-rc.lf+1;
  165.     }
  166.  
  167.     for (i = 0; i < len; i++)    {
  168.         int xi = 0, yi = 0;
  169.         if (vertbar)
  170.             yi = i;
  171.         else
  172.             xi = i;
  173.         PutWindowChar(wnd, nc, rc.lf+xi, rc.tp+yi);
  174.     }
  175. }
  176.  
  177. static void PaintMsg(WINDOW wnd)
  178. {
  179.     int i;
  180.     VECT *vc = wnd->VectorList;
  181.     for (i = 0; i < wnd->VectorCount; i++)    {
  182.         if (vc->vt == VECTOR)
  183.             PaintVector(wnd, vc->rc);
  184.         else
  185.             PaintBar(wnd, vc->rc, vc->vt);
  186.         vc++;
  187.     }
  188. }
  189.  
  190. static void DrawVectorMsg(WINDOW wnd,PARAM p1,enum VectTypes vt)
  191. {
  192.     if (p1)    {
  193.         VECT vc;
  194.         wnd->VectorList = DFrealloc(wnd->VectorList,
  195.                 sizeof(VECT) * (wnd->VectorCount + 1));
  196.         vc.vt = vt;
  197.         vc.rc = *(RECT *)p1;
  198.         *(((VECT *)(wnd->VectorList))+wnd->VectorCount)=vc;
  199.         wnd->VectorCount++;
  200.     }
  201. }
  202.  
  203. static void DrawBoxMsg(WINDOW wnd, PARAM p1)
  204. {
  205.     if (p1)    {
  206.         RECT rc = *(RECT *)p1;
  207.         rc.bt = rc.tp;
  208.         SendMessage(wnd, DRAWVECTOR, (PARAM) &rc, TRUE);
  209.         rc = *(RECT *)p1;
  210.         rc.lf = rc.rt;
  211.         SendMessage(wnd, DRAWVECTOR, (PARAM) &rc, FALSE);
  212.         rc = *(RECT *)p1;
  213.         rc.tp = rc.bt;
  214.         SendMessage(wnd, DRAWVECTOR, (PARAM) &rc, TRUE);
  215.         rc = *(RECT *)p1;
  216.         rc.rt = rc.lf;
  217.         SendMessage(wnd, DRAWVECTOR, (PARAM) &rc, FALSE);
  218.     }
  219. }
  220.  
  221. int PictureProc(WINDOW wnd, MESSAGE msg, PARAM p1, PARAM p2)
  222. {
  223.     switch (msg)    {
  224.         case PAINT:
  225.             BaseWndProc(PICTUREBOX, wnd, msg, p1, p2);
  226.             PaintMsg(wnd);
  227.             return TRUE;
  228.         case DRAWVECTOR:
  229.             DrawVectorMsg(wnd, p1, VECTOR);
  230.             return TRUE;
  231.         case DRAWBOX:
  232.             DrawBoxMsg(wnd, p1);
  233.             return TRUE;
  234.         case DRAWBAR:
  235.             DrawVectorMsg(wnd, p1, (enum VectTypes)p2);
  236.             return TRUE;
  237.         case CLOSE_WINDOW:
  238.             if (wnd->VectorList != NULL)
  239.                 free(wnd->VectorList);
  240.             break;
  241.         default:
  242.             break;
  243.     }
  244.     return BaseWndProc(PICTUREBOX, wnd, msg, p1, p2);
  245. }
  246.  
  247. static RECT PictureRect(int x, int y, int len, int hv)
  248. {
  249.     RECT rc;
  250.     rc.lf = rc.rt = x;
  251.     rc.tp = rc.bt = y;
  252.     if (hv)
  253.         /* ---- horizontal vector ---- */
  254.         rc.rt += len-1;
  255.     else
  256.         /* ---- vertical vector ---- */
  257.         rc.bt += len-1;
  258.     return rc;
  259. }
  260.  
  261. void DrawVector(WINDOW wnd, int x, int y, int len, int hv)
  262. {
  263.     RECT rc = PictureRect(x,y,len,hv);
  264.     SendMessage(wnd, DRAWVECTOR, (PARAM) &rc, 0);
  265. }
  266.  
  267. void DrawBox(WINDOW wnd, int x, int y, int ht, int wd)
  268. {
  269.     RECT rc;
  270.     rc.lf = x;
  271.     rc.tp = y;
  272.     rc.rt = x+wd-1;
  273.     rc.bt = y+ht-1;
  274.     SendMessage(wnd, DRAWBOX, (PARAM) &rc, 0);
  275. }
  276.  
  277. void DrawBar(WINDOW wnd,enum VectTypes vt,
  278.                         int x,int y,int len,int hv)
  279. {
  280.     RECT rc = PictureRect(x,y,len,hv);
  281.     SendMessage(wnd, DRAWBAR, (PARAM) &rc, (PARAM) vt);
  282. }
  283.